home *** CD-ROM | disk | FTP | other *** search
/ Building Homes of Our Own / Building Homes of our Own.iso / setup / data1.cab / Everything / working / houCons.dxr / interface_84_PaletteDisplaySprite behave.ls < prev    next >
Encoding:
Text File  |  2002-09-25  |  311 b   |  18 lines

  1. property mySprite
  2.  
  3. on beginSprite me
  4.   mySprite = me.spriteNum
  5. end
  6.  
  7. on findPaletteDisplaySprite me
  8.   return mySprite
  9. end
  10.  
  11. on doSecondFloor me
  12.   set the member of sprite mySprite to member("PrefPanal SecondFloor")
  13. end
  14.  
  15. on doFirstFloor me
  16.   set the member of sprite mySprite to member("PrefPanal FirstFloor")
  17. end
  18.